1 REM"[141][145]AMIGA BALL DEMO BY ERIC MASON
2 [143]"GOSUBON* PUBLIC DOMAIN *   HAVE FUN!
3 REM"[141][145]----------------------------------------[141][141]
10 [145]L[137]40,50
20 [151]53280,0:[151]53281,0:[153]"RETURNLOAD":[141]1000
30 L[178]1:[147]"FADEIN/OUT",8,1
40 [151]55,0:[151]56,20:[156]:A(1)[178]13:A(2)[178]14:A(3)[178]254:L[178]2:[147]"AMIGA",8,1
50 [158]34592:[143] MOVE SCREEN
55 [151]55,0:[151]56,20:[156]:A(1)[178]13:A(2)[178]14:A(3)[178]254
60 [129]T[178]0[164]2000:[130]:[143] WAIT FOR DRAMATIC EFFECT
70 [158]34595:[141]170:[129]I[178]0[164]9000:[130]:[143] FADE-IN, MOVE BALL, WAIT
90 [158]34598:[129]T[178]0[164]2000:[130]:[143] FADE-OUT, WAIT
110 [140]:[138]55:[143]  SYS2048:REM BACK TO BASIC
170 [151]53248,100:[151]53249,110:X[178]100:Y[178]110
180 [151]53271,1:[151]53277,1:X1[178]2:Y1[178]2:LX[178]80:RX[178]170:TY[178]80:BY[178]120:[129]I[178]1[164]205
190 [139]X[170]X1[177][178]LX[175]X[170]X1[178][179]RX[167]X[178]X[170]X1:[139]X[178][177]RX[176]X[178][179]LX[167]X1[178][171]X1:[151]54296,15:[151]54296,0
200 [139]Y[170]Y1[179][178]BY[175]Y[170]Y1[178][177]TY[167]Y[178]Y[170]Y1:[139]Y[178][177]BY[176]Y[178][179]TY[167]Y1[178][171]Y1:[151]54296,15:[151]54296,0
210 S[178]S[170]1:[139]S[179]4[167][151]2040,A(S)
220 [139]S[178]4[167]S[178]0:[151]2040,255
230 [151]53248,X:[151]53249,Y:[130]
233 Y1[178]4:[129]I[178]X[164]255[169]5:[151]53248,I:Y[178]Y[171]Y1:[151]53249,Y:Y1[178]Y1[173]1.05:[130]
234 [151]53264,1:[129]I[178]5[164]105[169]5:[151]53248,I:Y[178]Y[171]Y1:[151]53249,Y:Y1[178]Y1[173]1.05:[130]
235 [151]53269,0:[151]53248,0:[151]53249,0:[151]53264,0:[151]53269,1:[142]
1000 [153]"    LEFT$ERE COMES THE ATN(null)RIGHT$CHR$ATN!!!"
1001 [153]"                         (null)OADING..."
1005 [129]I[178]0[164]127:[135]B:[151]832[170]I,B:[130]:[151]53269,1:[151]53285,2:[151]53286,1
1010 [151]53287,0:[151]53275,0:[151]53276,1:[151]2040,13
1020 [129]I[178]0[164]127:[135]B:[151]16256[170]I,B:[130]:[151]53271,1:[151]53277,1:[142]
1030 [131],,,,,,1,242,,15,92,128,53,245,32,31,95,128,95,95,96,245,245,200
1040 [131]245,245,224,95,95,72,95,95,96,245,245,192,53,245,32,15,92,128,1,242,0
1050 [131],,,,,,,,,,,,,,,,,,0
1060 [131],,,,,,3,210,,13,124,128,23,215,32,61,125,128,125,125,96,215,215,200
1070 [131]215,215,224,125,125,72,125,125,96,215,215,192,55,215,32,13,124,128
1080 [131]3,210,,,,,,,,,,,,,,,,,,,,0
1090 [131],,,,,,3,82,,5,244,128,31,95,32,53,247,128,245,245,224,95,95,72
1100 [131]95,95,96,245,245,200,245,245,224,95,95,64,31,95,32,5,244,128,3,82,0
1110 [131],,,,,,,,,,,,,,,,,,0
1120 [131],,,,,,1,114,,7,212,128,61,125,32,23,215,128,215,215,224,125,125,72
1130 [131]125,125,96,215,215,224,125,125,64,61,125,32,7,212,128,1,114,0
1140 [131],,,,,,,,,,,,,,,,,,,,,,0